home *** CD-ROM | disk | FTP | other *** search
/ Floppyshop 2 / Floppyshop - 2.zip / Floppyshop - 2.iso / diskmags / 3565-4.665 / dmg-4182 / source / planets.bas (.txt) < prev    next >
Atari STOS Basic  |  1987-04-21  |  2KB  |  50 lines
  1. 10 CURS
  2. 100 VARNAME
  3. 1000 VARNAME
  4. 1020 IF
  5. 1030 IF
  6. 1040 IF
  7. 1050 RETURN
  8. 110 REPEAT
  9. 120 INK
  10. 130 ELLIPSE
  11. 140 FOR
  12. 150 VARNAME
  13. 160 FOR
  14. 170 VARNAME
  15. 180 VARNAME
  16. 190 IF
  17. 20 PALETTE
  18. 200 PLOT
  19. 210 VARNAME
  20. 220 VARNAME
  21. 230 IF
  22. 240 PLOT
  23. 250 NEXT
  24. 260 IF
  25. 270 INK
  26. 280 INK
  27. 290 IF
  28. 30 SET PAINT
  29. 300 INK
  30. 310 INK
  31. 320 NEXT
  32. 380 GOTO
  33. 390 ERASE
  34. 40 FOR
  35. 400 RESERVE
  36. 410 SCREEN COPY
  37. 430 WAIT VBL
  38. 450 VARNAME
  39. 460 HIDE
  40. 470 SCREEN COPY
  41. 471 SCREEN COPY
  42. 480 IF
  43. 481 SHOW
  44. 490 RETURN
  45. 50 PLOT
  46. 60 NEXT
  47. 70 SCREEN COPY
  48. 80 REPEAT
  49. 90 HIDE
  50.